home *** CD-ROM | disk | FTP | other *** search
/ TeX 1995 July / TeX CD-ROM July 1995 (Disc 1)(Walnut Creek)(1995).ISO / tex-k / tex-k-archive.past / tex-k-archive.gz / tex-k-archive / 000435_martin@enws125.eas.asu.edu_Mon Mar 28 07:27:45 1994.msg < prev    next >
Internet Message Format  |  1994-10-11  |  3KB
  1. Received: from asuvax.eas.asu.edu (asuvax.ASU.EDU) by cs.umb.edu with SMTP id AA15937
  2.   (5.65c/IDA-1.4.4 for <tex-k@cs.umb.edu>); Mon, 28 Mar 1994 16:29:13 -0500
  3. Received: from trcsun3 (enws125.eas.asu.edu) by asuvax.eas.asu.edu with SMTP id AA11570
  4.   (5.65c/IDA-1.4.4 for tex-k@cs.umb.edu); Mon, 28 Mar 1994 14:23:05 -0700
  5. Received: by trcsun3.eas.asu.edu (4.1/SMI-4.1)
  6.     id AA06634; Mon, 28 Mar 94 14:27:45 MST
  7. Date: Mon, 28 Mar 94 14:27:45 MST
  8. From: martin@enws125.eas.asu.edu (Ross Martin)
  9. Message-Id: <9403282127.AA06634@trcsun3.eas.asu.edu>
  10. To: tex-k@cs.umb.edu
  11. Cc: martin@enws125.eas.asu.edu
  12. Subject: xdvik patch to enhance dvips psfile special handling
  13.  
  14.  
  15. Hi,
  16.  
  17. The following patch fixes xdvik 1.7 so that it will handle dvips
  18. psfile specials when the bounding box is not included.  It works by
  19. opening the postscript file and getting the bounding box from it.
  20.  
  21. The motivation for this patch is to get xdvik to work properly with
  22. postscript generated by xfig in the pstex/pstex_t format (which I
  23. highly recommend).
  24.  
  25. cd to the directory containing xdvik-1.7 and do patch -p <this-file.
  26. The only file changed is "xdvik-1.7/xdvik/epsf.c".
  27.  
  28. --Ross Martin
  29. martin@trcsun3.eas.asu.edu
  30.  
  31.  
  32. diff -rc xdvik-1.7/xdvik/epsf.c xdvik-1.7-new/xdvik/epsf.c
  33. *** xdvik-1.7/xdvik/epsf.c    Fri Feb 25 09:34:06 1994
  34. --- xdvik-1.7-new/xdvik/epsf.c    Sat Mar 26 09:05:45 1994
  35. ***************
  36. *** 71,78 ****
  37.     int *llx, *lly, *urx, *ury, *rwi;
  38.   {
  39.     float llx_f, lly_f, urx_f, ury_f, rwi_f;
  40. !   
  41.     special += 6; /* skip the ``psfile'' which may be case-mixed */
  42.     if (sscanf(special, "=%s llx=%f lly=%f urx=%f ury=%f rwi=%f",
  43.                 psfilename, &llx_f, &lly_f, &urx_f, &ury_f, &rwi_f) == 6) {
  44.       *llx = llx_f + .5;
  45. --- 71,84 ----
  46.     int *llx, *lly, *urx, *ury, *rwi;
  47.   {
  48.     float llx_f, lly_f, urx_f, ury_f, rwi_f;
  49. !   FILE *fp;
  50. !   char buffer[500];
  51. ! 
  52.     special += 6; /* skip the ``psfile'' which may be case-mixed */
  53. +   if (sscanf(special, "=%s ",psfilename) != 1) {
  54. +     Moan("\"%s\" not understood.", special);
  55. +     return False;
  56. +   }
  57.     if (sscanf(special, "=%s llx=%f lly=%f urx=%f ury=%f rwi=%f",
  58.                 psfilename, &llx_f, &lly_f, &urx_f, &ury_f, &rwi_f) == 6) {
  59.       *llx = llx_f + .5;
  60. ***************
  61. *** 81,87 ****
  62.       *ury = ury_f + .5;
  63.       *rwi = rwi_f + .5;
  64.       return True;
  65. !   } else {
  66.       Moan("\"%s\" not understood.", special);
  67.       return False;
  68.     }
  69. --- 87,113 ----
  70.       *ury = ury_f + .5;
  71.       *rwi = rwi_f + .5;
  72.       return True;
  73. !   } 
  74. !   else {
  75. !     fp=fopen(psfilename,"r");
  76. !     if(!fp)
  77. !       {
  78. !     Moan("File \"%s\" not found!", psfilename);
  79. !     return False;
  80. !       }
  81. !     for(;;)
  82. !       {
  83. !     fscanf(fp,"%[^\n]\n",buffer);
  84. ! /*    printf("Buffer: %s\n",buffer); */
  85. !     if(buffer[0]!='%')
  86. !       break;
  87. !     if(sscanf(buffer,"%%%%BoundingBox: %d %d %d %d", llx, lly, urx, ury)
  88. !        == 4)
  89. !       {
  90. !         *rwi = 10 * (*urx - *llx + 1);
  91. !         return True;
  92. !       }
  93. !       }
  94.       Moan("\"%s\" not understood.", special);
  95.       return False;
  96.     }